[LegacyColorValue = true]; 

{ TSMCambridgeHook: Cambridge Hook
  Copyright 1999, P.J.Kaufman. All rights reserved.
}
  inputs: length(20), vlength(10);

  plot1(TSMCambridgeHook(length,vlength),"TSMCambHook");